home *** CD-ROM | disk | FTP | other *** search
/ Micro Dingo 39 / Micro_Dingo_39_CD1.mdx / Delires / Hentai / sim.swf / scripts / DefineButton2_1020 / BUTTONCONDACTION on(release).as
Text File  |  2002-05-21  |  252b  |  15 lines

  1. on(release){
  2.    if(flower >= 1)
  3.    {
  4.       flower -= 1;
  5.       ratio = (0.5 * ch + 0.4 * st + 0.1 * kn) / 100;
  6.       ship = ship + 3 + 6 * ratio;
  7.       mood += 10;
  8.       gotoAndPlay(1930);
  9.    }
  10.    else
  11.    {
  12.       gotoAndStop(1678);
  13.    }
  14. }
  15.